home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / tgt10p.exe / Disk_1.ZIP / remote.tgt < prev    next >
Encoding:
INI File  |  1997-03-14  |  55.1 KB  |  1,044 lines

  1. [Variables]
  2. n0=%repeat Enabled
  3. n1=%ln 0
  4. n2=%txtlimit 4
  5. n3=%chglimit 5
  6. n4=%doplimit 5
  7. n5=%maskik 5
  8. n6=%countlimit 110
  9. n7=%echolimit 150
  10. n8=%ctcplimit 3
  11. n9=%limspc 1
  12. n10=%nokick ╗Wserv╗ ╗Xserv╗ ╗Bello╗ ╗\\Poker\\╗ 
  13. n11=%lm 0
  14. n12=%snicks ╗Pica╗ ╗Puta╗ ╗Rapariga╗  ╗CuDoce╗ ╗Viado╗ ╗Frango╗ ╗TeFode╗ ╗Rola╗
  15. n13=%Pswear ░porra░ ░merda░ ░caralho░ ░fudendo░ ░fuder░ ░puta░ ░rapariga░ ░boceta░ ░buceta░
  16. n14=%Fswear ░porr@░ ░merd@░ ░porra,░ ░p0rra░ ░bich@░ ░p0rr@░ ░c@r@lho░ ░put@░ ░porr*░ ░porraw░ ░Fod@m-se░
  17. n15=%tecp on
  18. n16=%hr.number 5
  19. n17=%ctcp.version 2
  20. n18=%ctcp.sound 11
  21. n19=%specialkik --==4TargeT« 12S6p9e4c2i7a13l 12K7i4c9K 3==--
  22. n20=%lc 0
  23. n21=%ctcp.ping 2
  24. n22=%ctcp.time 1
  25. n23=%numberkick 0
  26. n24=%mynick myNick
  27. n25=%Target 9,2--==⌐X TargeT« X⌐==-- PRO v1.0
  28. n26=%x 0
  29. n27=%x.x 0
  30. n28=%x.o -o
  31. n29=%version 4,15is using--==⌐X TargeT« X⌐==-- 4,15PRO v1.0, 6,15by \\Poker\\ and Bello
  32. n30=%cl 3
  33. n31=%tminutes 0
  34. n32=%tseconds 0
  35. n33=%ultcon It's your first connect with TargeT«
  36. n34=%seconds 0
  37. n35=%minutes 0
  38. n36=%times 0
  39. n37=%atacknick XxyY
  40. n38=%awtime 15:47:38
  41. n39=%awdate 13/03/97
  42. n40=%awms (9╗╗╗ 4Away 19½½½)
  43. n41=%hop #recife
  44. n42=%adress 0
  45. n43=%pi A Year, two months, three weeks, one day, seven hours, fifty-nine minutes and twenty seconds 
  46. n44=%sound I'm hearing .╖┤»`╖.╕╕.╖┤»`╖.╕╕.╖┤»`╖.╕╕.╖┤»`╖-> Macarena <-╖┤»`╖.╕╕.╖┤»`╖.╕╕.╖┤»`╖.╕╕.╖┤»`╖.
  47. n45=%awaynick ^Away^
  48. n46=%hour 0
  49. n47=%thour 0
  50. n48=%clone1 off
  51. n49=%clone2 off
  52. n50=%clone3 off
  53. n51=%clone4 off
  54. n52=%clone5 off
  55. n53=%clone6 off
  56. n54=%clone7 off
  57. n55=%clone8 off
  58. n56=%y 1
  59. n57=%netsplit off
  60. n58=%quity TaKaKi
  61. n59=%hours 1
  62. n60=%thours 0
  63. n61=%countkick Enabled
  64. n62=%capskick Enabled
  65. n63=%sswear Enabled
  66. n64=%fake Enabled
  67. n65=%tan Enabled
  68. n66=%proctcp 10 TargeT  ½½ The best
  69. n67=%antkill Enabled
  70. n68=%text 40
  71. n69=%pnick Disabled
  72. n70=%kclone y
  73. n71=%lag 2
  74. n72=%server 200.249.223.31
  75. n73=%allcmd //echo 4 %mynumber confirmed
  76. n74=%ccc join #recife
  77. n75=%kban n
  78. n76=%t.t 0
  79. n77=%kclones n
  80. n78=%masskick Disabled
  81. n79=%massdeop disabled
  82. n80=%nukeport 6667
  83. n81=%nkip 200.249.223.47
  84. n82=%nserver irc.elogica.com.br
  85. n83=%dect m
  86. n84=%kkban n
  87. n85=%swcheck tais doido
  88. n86=%add2 *!*target@200.249.223.*
  89. n87=%scan 0
  90. n88=%s 1
  91. n89=%tex1 89
  92. n90=%totallow 45
  93. n91=%co 0
  94. n92=%rainbow oxe mainha
  95. n93=%text.change 11
  96. n94=%rand1 10
  97. n95=%text2add 10a
  98. n96=%sections 0
  99. n97=%reverseme assim
  100. n98=%length 0
  101. n99=%backtext missa
  102. n100=%tempback a
  103. n101=%reversed_text missa
  104. n102=%temp missa
  105. n103=%color y
  106. n104=%num2 1
  107. n105=%num3 9
  108. n106=%ftalk 5╨10ε12Z 5╨2°10ε5╨2°
  109. n107=%antcl Enabled
  110. n108=%msg 1,9o4,1u1,9 4,1a1,9s4,1s1,9i4,1m
  111. n109=%pt 0
  112. n110=%rer false
  113. n111=%ret false
  114. n112=%num 0
  115. n113=%sizer 11
  116. n114=%irc yes
  117. n115=%chn1 #recife
  118. n116=%dcont no
  119. n117=%retu2 no
  120. n118=%rpost n
  121. n119=%nickt CarlaPere
  122. n120=%klname1 Teteia_
  123. n121=%klname2 _Mactho
  124. n122=%klname3 Oioioi
  125. n123=%klname4 Pop_R
  126. n124=%klname5 ToAway_
  127. n125=%klname6 __Aninha
  128. n126=%klname7 Ok
  129. n127=%klname8 Louis
  130. n128=%jnick ╗_TargeT_╗
  131. n129=%chefl no
  132. n130=%swearnick Enabled
  133. n131=%kiklimit 3
  134. n132=%rkklist ╗Bello╗
  135. n133=%kknick ╗GrEeN_DaY╗
  136. n134=%bbnick \\Crash\\
  137. n135=%final missa
  138. n136=%endreverse missa
  139. n137=%rnswear bbbbb
  140. n138=%cops 4
  141. n139=%cnon 2
  142. n140=%cban off
  143. n141=%ckik off
  144. n142=%knlimit 3
  145. n143=%atime 12
  146. n144=%chklone #recife
  147. n145=%ck crack
  148. n146=%rchkln #recife
  149. n147=%tystat m
  150. n148=%c.max 2
  151. n149=%clip on
  152. n150=%limitctcp 3
  153. n151=%retrn false
  154. n152=%rswear ░eita░
  155. n153=%retur no
  156. n154=%k2nick ╗BelloAway╗
  157. n155=%Yiv %TargeT_nFlu
  158. n156=%speclone 4
  159. n157=%^TargeT^_ctcp 1
  160. n158=%time 3:47:55-PM
  161. n159=%sub PM
  162. n160=%t1 oioi
  163. n161=%ptoken 15
  164. n162=%pmtime 3
  165. n163=%clock 7:52:50-PM
  166. n164=%ccban n
  167. n165=%size 69
  168. n166=%rtype b
  169. n167=%textfinal 4o7x7e6 2m8a8i7n14h10a
  170. n168=%record no
  171. n169=%wmsg yes
  172. n170=%cckk n
  173. n171=%confi Ok
  174. n172=%nrec 1
  175. n173=%atrec ^Away^
  176. n174=%seekik ╗Rafael╗
  177. n175=%lecho 449
  178. n176=%[DioGo]_kk 1
  179. n177=%parms TargeT Θ o melhor script
  180. n178=%safenick Bello
  181. n179=%flctcp 1
  182. n180=%sTgT TargeT Θ o melhor Script
  183. n181=%vr 6
  184. n182=%veri Script
  185. n183=%vefin ░script░
  186. n184=%recs 4
  187.  
  188. [Commands]
  189. n0=;                    ⌐ 0 //\/\\ A N D º
  190. n1=;====================================
  191. n2=;     --==⌐ TargeT«  v1.0 PRO  ⌐==--- 1997⌐
  192. n3=;                              by
  193. n4=;      
  194. n5=;            \\Poker\\   and   Bello
  195. n6=;====================================
  196. n7=;    DO NOT EDIT BELLOW THIS LINE !!!
  197. n8=;   if you edit , you can invalid all script ,
  198. n9=;   not edit , either not copy this to your
  199. n10=;own script. Make yoursefl your own script !!!  
  200. n11=;------------------------------------------------------------------------
  201. n12=1:ON PRIVMSG:/echo 4 $parms
  202. n13=#Away disabled
  203. n14=+2:page:{
  204. n15=  msg $nick %Target PAGE Page oks , wait 1 minute if I not respond send a chat
  205. n16=  /notice $me $nick Paged you
  206. n17=  /timer 2 1 /wavplay c:\target\waves\page.wav
  207. n18=  ignore -tu20 $nick
  208. n19=}
  209. n20=#Away end
  210. n21=#TargeT start
  211. n22=*1:*:{
  212. n23=  fctcp $nick
  213. n24=  set -q %kknick $chr(187) $+ $nick  $+ $chr(187)
  214. n25=  if ($fldctcp($nick) => %ctcplimit) {
  215. n26=    ignore -tu60 $nick 2
  216. n27=    cnick
  217. n28=    /ame was 4FlooD atacked with 7½( $+ $parm1  FLooD )╗ by 12< $+ $nick $+ >=( $+ $address $+ ) info by %Target
  218. n29=    wavplay c:\target\waves\protect.wav
  219. n30=    /prot $nick
  220. n31=    echo 4 -s == TargeT« Protection Status ==
  221. n32=    echo 7 -s Atacked with: 12 $+ $parm1
  222. n33=    echo 7 -s Nick:12 $nick
  223. n34=    echo 7 -s Address:12 $address
  224. n35=    echo 7 -s Protection Action:12 Change your nick,  ignore $nick and Ban nick
  225. n36=    echo 4 -s == End of TargeT« Protection == 
  226. n37=  }
  227. n38=  else {
  228. n39=    if (($parm1 == DCC) && ($parm5 == 19)) {
  229. n40=      if ($parm2 == CHAT) {
  230. n41=        ignore -tu60 $nick 3
  231. n42=        /notice $me 4Port 19 12Chat Bomb 7Detected from3 $nick 
  232. n43=        /notice $me 6Autoignoring them for12 60 seconds
  233. n44=        /notice $nick 3Port Bomb?? 12I'm using 4TargeT«!
  234. n45=        close -c $nick
  235. n46=      }
  236. n47=      if ($parm2 == SEND) {
  237. n48=        ignore -u60 $nick 3
  238. n49=        /notice $me 4Fake File: $parm3 12Size: $parm6 7Detected from3 $nick 
  239. n50=        /notice $me 6Autoignoring them for12 60 seconds
  240. n51=        /msg $nick 3Don't send me fake files! 4Like $parm3 with $parm6 bytes long. 7 Auto-ignoring you for 60 seconds!10 I'm using 4TargeT«
  241. n52=        close -g $nick 
  242. n53=      }
  243. n54=    }
  244. n55=    if ($parm1 == ECHO) {
  245. n56=      set -q %lecho $len($parms)
  246. n57=      wavplay c:\target\waves\protect.wav
  247. n58=      if (%lecho >= %echolimit) { ignore -tu60 $nick 2 | prot | /ame was 4FlooD atacked 7½( $+ $parm1 with more than %echolimit words )╗ by 12< $+ $nick $+ >=( $+ $address $+ ) info by %Target | halt }
  248. n59=    }
  249. n60=    elseif ($parm1 == PING) { raw -q NOTICE $nick : $+ PING %pi $+  }
  250. n61=    elseif ($parm1 == SOUND) { raw -q NOTICE $nick : $+ SOUND %sound $+  }
  251. n62=    timer 1 15 /unctcp $nick 
  252. n63=    timer 1 15 /unset % $+ $nick_ctcp
  253. n64=  }
  254. n65=}
  255. n66=#TargeT end
  256. n67=#Power disabled
  257. n68=+2:PING:/dlevel 30 | /timer 1 15 /dlevel 2 | /raw -q NOTICE $nick : $+ PING %pi $+  | 
  258. n69=+300:PING:/knick | /timer 1 30 /dlevel 2 | /dlevel 400 | /echo 3 ½( PING )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with 7½( PING FLooD )╗ by 12< $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /wavplay c:\target\waves\protect.wav | /prot $nick
  259. n70=+2:VERSION:/dlevel 30 | /timer 1 15 /dlevel 2 | /raw -q NOTICE $nick : $+ VERSION %ver $+  | 
  260. n71=+300:VERSION:/knick | /timer 1 30 /dlevel 2 | /dlevel 400 | /ignore -tu45 $nick 2 | /echo 3 ½( VERSION )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( VERSION FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick | /wavplay c:\target\waves\protect.wav | /prot $nick
  261. n72=+2:FINGER:/dlevel 30 | /timer 1 15 /dlevel 2
  262. n73=+300:FINGER:/inick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( FINGER )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( FINGER FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  263. n74=+2:TIME:/dlevel 30 | /timer 1 15 /dlevel 2
  264. n75=+300:TIME:/bnick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( TIME )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( TIME FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  265. n76=+2:CLIENTINFO:/dlevel 30 | /timer 1 15 /dlevel 2
  266. n77=+300:CLIENTINFO:/cnick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3  ½( CLIENTINFO )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( CLIENTINFO FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  267. n78=+2:USERINFO:/dlevel 30 | /timer 1 15 /dlevel 2
  268. n79=+300:USERINFO:/cnick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( USERINFO )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( USERINFO FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  269. n80=+2:ECHO:/dlevel 30 | /timer 1 15 /dlevel 2
  270. n81=+300:ECHO:/onick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( ECHO )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( ECHO FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  271. n82=+2:SOUND:/dlevel 30 | /timer 1 15 /dlevel 2 | /raw -q NOTICE $nick : $+ SOUND %sound $+  | 
  272. n83=+300:SOUND:/cnick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( SOUND )╗ From...  $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( SOUND FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  273. n84=+2:PONG:/dlevel 30 | /timer 1 15 /dlevel 2
  274. n85=+300:PONG:/bnick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( PONG )╗ From...  $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( PONG FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  275. n86=+2:VER:/dlevel 30 | /timer 1 15 /dlevel 2
  276. n87=+300:VER:/onick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( VER )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( VER FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /raw -q NOTICE $nick : $+ VERSION %ver $+  | | /wavplay c:\target\waves\protect.wav | /prot $nick
  277. n88=+2:XDCC LIST:/dlevel 30 | /timer 1 15 /dlevel 2
  278. n89=+300:XDCC LIST:/inick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( XDCC )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( XDCC LIST FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  279. n90=+2:SEND:/dlevel 30 | /timer 1 15 /dlevel 2 | /notice $nick Huumm , Files ... thank you but don't send me much , you known floods protection :) | /sound $nick c:\target\waves\thank.wav
  280. n91=+300:DCC SEND:/cnick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( DCC SEND )╗ From...   $nick $+ =  $+ $address $+ | /ame was, possibly, FlooD atacked with ½( DCC SEND FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  281. n92=+2:DCC CHAT:/dlevel 30 | /timer 1 15 /dlevel 2 | /notice $nick Oks Let's Talk !! %target
  282. n93=+300:DCC CHAT:/onick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( DCC CHAT )╗ From...   $nick $+ =  $+ $address $+ | /ame was, possibly, FlooD atacked with ½( DCC CHAT FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  283. n94=+2:DCC Resume:/dlevel 30 | /timer 1 15 /dlevel 2
  284. n95=+300:DCC Resume:/bnick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( DCC RESUME )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( DCC Resume FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  285. n96=+2:SED:/dlevel 30 | /timer 1 15 /dlevel 2
  286. n97=+300:SED:/onick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( SED )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( SED FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  287. n98=+2:TROUT:/dlevel 30 | /timer 1 15 /dlevel 2
  288. n99=+300:TROUT:/cnick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( TROUT )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( TROUT FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  289. n100=+2:HALIBUT:/dlevel 30 | /timer 1 15 /dlevel 2
  290. n101=+300:HALIBUT:/cnick | /timer 1 30 /dlevel 2 | /dlevel 400 |/ignore -tu45 $nick 2 | /echo 3 ½( HALIBUT )╗ From...   $nick $+ =  $+ $address $+ | /ame was FlooD atacked with ½( HALIBUT FLooD )╗ by < $+ $nick $+ >=( $+ $address $+ ) info by %Target | /ignore -tu45 $nick 2 | /timer87 1 5 %mynick  | /wavplay c:\target\waves\protect.wav | /prot $nick
  291. n102=+30:*:/dlevel 300 | /timer 1 15 /dlevel 2 |
  292. n103=+400:*:!
  293. n104=#Power end 
  294.  
  295. [Events]
  296. n0=;                         ú V ú N T º
  297. n1=;====================================
  298. n2=;     --==⌐ TargeT«  v1.0 PRO  ⌐==--- 1997⌐
  299. n3=;                              by
  300. n4=;       
  301. n5=;               \\Poker\\   and   Bello
  302. n6=;====================================
  303. n7=;    DO NOT EDIT BELLOW THIS LINE !!!
  304. n8=;   if you edit , you can invalid all script ,
  305. n9=;   not edit , either not copy this to your
  306. n10=;own script. Make yourself your own script !!!  
  307. n11=;------------------------------------------------------------------------
  308. n12=+88:ON QUIT {
  309. n13=  if (($parm1 == Excess) && ($parm2 == Flood) && ($parm3 == $null)) {
  310. n14=    ruser $nick
  311. n15=    echo 4 Mission Complete !! The Target is Die !!!
  312. n16=  }
  313. n17=  else { echo 3 The Target has left the IRC }
  314. n18=}
  315. n19=#CheckLag Disabled
  316. n20=*1:ON CTCPREPLY:PING* {
  317. n21=  if ($parm2 == $null) { goto end }
  318. n22=  else {
  319. n23=    %lag = $ctime - $parm2
  320. n24=    if (%lag < 0) set %pt 0
  321. n25=    if (%lag < 5) echo 12 -a [ $+ $nick Lag TesT]:7 %lag secs - 2--==⌐ TargeT« ⌐==--: 4The Detected lag is minimal
  322. n26=    elseif (%lag < 20) echo 12 -a [ $+ $nick Lag TesT]:7 %lag secs - 2--==⌐ TargeT« ⌐==--:4 The Detected lag is medium
  323. n27=    elseif (%lag >= 20) && (%lag isnum 0-99999) echo 12 -a [ $+ $nick Lag TesT]:7 %lag secs - 2--==⌐ TargeT« ⌐==--:4The Detected lag is Extreme
  324. n28=  }
  325. n29=  timer 1 3 /disable #CheckLag
  326. n30=  :end
  327. n31=  halt
  328. n32=}
  329. n33=#CheckLag end
  330. n34=#JoinClone start
  331. n35=*1:ON JOIN:#:{
  332. n36=  ;TargeT«
  333. n37=  set -q %kknick $chr(187) $+ $nick  $+ $chr(187)
  334. n38=  if (%kknick isin %nokick) { goto nao | halt }
  335. n39=  if (%kknick isin %snicks) && ($nick !isop $chan) && (%swearnick == Enabled) && (%kknick !isin %nokick) {
  336. n40=    lnick $nick
  337. n41=    inc %numberkick 1
  338. n42=    if (($lnck($nick) isnum 0-99) && ($lnck($nick) => %knlimit)) { ban -u60 $chan $nick | timer 1 1 /unnik $nick | unset % $+ $nick _n | unset % $+ [ $nick ] $+ _n  }
  339. n43=    kick $chan $nick --==4 TargeT« 3Autokick ==-- (2╗╗╗ 12S6w9e4a13r 3N12i7c10k 2½½½3) 12 Change your nick!  4TargeT : %numberkick 2
  340. n44=  }
  341. n45=  if ($chan isin %chklone) {
  342. n46=    if ($nick = $me) { who $chan | Echo 6 -a Updating Ial for -= $+ $chan $+ =- |  halt } 
  343. n47=    if ($isbot($nick) = true) { halt }
  344. n48=    if ($isme($nick) = true) { notice $nick 12Welcome to the party my Master,7 Channel is $chan | halt }
  345. n49=    :clone | if (%antcl != Enabled) { goto end }
  346. n50=    %nx = 1 | %qc = $chr(32) | %nc = $ial($wildsite,0) | If (%nc = 0) { echo 4 -a Syntax Error 12while Reading IAL on7 $site | halt }
  347. n51=    :up | if [ $ial($wildsite,%nx).nick ] ison $chan { %qc = %qc $ial($wildsite,%nx).nick , | inc %clns | inc %nx | goto up } 
  348. n52=    %qc = $remove(%qc,$chr(32))
  349. n53=    if ($nick !isop $chan) { %c.max = %cnon } | else { %c.max = %cops } 
  350. n54=    if (%Clns < %c.max) { goto end }
  351. n55=    if (%Clns == %c.max) { if (%c.max = 1 ) { halt } | %eee = 1 | :Secho | if (%eee <= %Clns) { set %nick $gettok(%qc,%eee,44) | if ($isme(%nick) = false)  { if (%eee == 1) { echo 12 -a Max Connects from %nick 7 Clones Nicks: } |  echo 12 -a  Clone # $+ %eee - %nick  | inc %eee | goto secho } goto other } }
  352. n56=    if (%clns > %c.max)  {
  353. n57=      %e2e = 1 | :Scho | if (%e2e <= %Clns) { set %nick $gettok(%qc,%e2e,44) | if ($isme(%nick) = false)  { if (%e2e == 1) { echo 12 -a Clones Detected!!7 Clones Nicks: } | echo 12 -a  Clone # $+ %e2e - %nick  | inc %e2e | goto scho } }
  354. n58=      if ($me isop $chan) && ($nick !isop $chan) && (%kknick !isin %nokick) {
  355. n59=        if (%cban = on) { if ($isme($nick) = false) { ban -u30 $chan $nick 2 } }
  356. n60=        if (%ckik = on) { 
  357. n61=          %nnn = 1 | :Kick | if (%nnn <= %Clns) { set %nick $gettok(%qc,%nnn,44) | if ($isme(%nick) = false)  { kick $chan %nick 2╗╗ 11C5l14o9n3e13s 2½½  -=12Clone Number4 %nnn  - 9out of4 %clns $+ ,7 $a.kick(clone) Kick by 4TargeT } | inc %nnn | goto Kick }
  358. n62=          goto end
  359. n63=        }
  360. n64=      } 
  361. n65=      else { notice $chan %qc are %clns Clones from $site and on $chan Get Them! | goto end }
  362. n66=    }
  363. n67=    :end | unset %nx %nnn %nick %qc %nc %clns %eee %e2e | halt
  364. n68=  }
  365. n69=  :nao
  366. n70=}
  367. n71=#JoinClone end
  368. n72=*1:ON JOIN:#:{
  369. n73=  set -q %kknick $chr(187) $+ $nick  $+ $chr(187)
  370. n74=  if (%kknick isin %nokick) { goto nao | halt }
  371. n75=  if (%kknick isin %snicks) && ($nick !isop $chan) && (%swearnick == Enabled) && (%kknick !isin %nokick) && ($me isop $chan) {
  372. n76=    lnick $nick
  373. n77=    inc %numberkick 1
  374. n78=    if (($lnck($nick) isnum 0-99) && ($lnck($nick) => %knlimit)) { ban -u60 $chan $nick | timer 1 1 /unnik $nick | unset % $+ $nick _n | unset % $+ [ $nick ] $+ _n  }
  375. n79=    kick $chan $nick --==4 TargeT« 3Autokick ==-- (2╗╗╗ 12S6w9e4a13r 3N12i7c10k 2½½½3) 12 Change your nick!  4TargeT : %numberkick 2
  376. n80=  }
  377. n81=  :nao
  378. n82=}
  379. n83=#FloodProtect disabled
  380. n84=1:ON TEXT:*:#:{
  381. n85=  set -q %kknick $chr(187) $+ $nick  $+ $chr(187)
  382. n86=  if (%kknick isin %nokick) { goto not | halt }
  383. n87=  %parms = $parms 
  384. n88=  if (%sswear == Enabled) { if ($swear($parms) = true) { Pswear | halt } }
  385. n89=  if (%fake == Enabled) { if ($swear($parms) = fktrue) { fakeswear | halt } }
  386. n90=  otherkick
  387. n91=  chefl $nick
  388. n92=  if (($fldnick($nick) => %txtlimit ) && ($nick !isop $chan) && (%tan == Enabled) && (%kknick !isin %nokick)) {
  389. n93=    chkik $nick
  390. n94=    /set -q %numberkick %numberkick + 1
  391. n95=    set %fldnick 0
  392. n96=    if (($chekik($nick) isnum 0-99) && ($chekik($nick) => %kiklimit)) { ban -u60 $chan $nick | /kick $chan $nick 4TargeT« 3AuTo-BaN 12BANNED for 31minute (2╗10 %kiklimit x11F5l14o9o6d 2½3 | timer 1 1 /unkik $nick | unset % $+ $nick_kk }
  393. n97=    else { kick $chan $nick --==4TargeT« 3AuTo-KiCk==-- (2╗╗╗12 T6e9x7t 12F7l4o9o6d 2½½½3)  4TargeT : %numberkick 3 }
  394. n98=    uncfl $nick
  395. n99=    unset % $+ [ $nick ] $+ _TgT
  396. n100=    /timer 1 6 /unkik $nick
  397. n101=  }
  398. n102=  else { timer 1 5 /uncfl $nick | /timer 1 6 /unkik $nick }
  399. n103=  :not
  400. n104=}
  401. n105=1:ON ACTION:*:#:{
  402. n106=  set -q %kknick $chr(187) $+ $nick  $+ $chr(187)
  403. n107=  if (%kknick isin %nokick) { goto not | halt }
  404. n108=  %parms = $parms 
  405. n109=  if (%sswear == Enabled) { if ($swear($parms) = true) { Pswear | halt } }
  406. n110=  if (%fake == Enabled) { if ($swear($parms) = fktrue) { fakeswear | halt } }
  407. n111=  otherkick
  408. n112=  chefl $nick
  409. n113=  if (($fldnick($nick) => %txtlimit ) && ($nick !isop $chan) && (%tan == Enabled) && (%kknick !isin %nokick)) {
  410. n114=    chkik $nick
  411. n115=    /set -q %numberkick %numberkick + 1
  412. n116=    set %fldnick 0
  413. n117=    if (($chekik($nick) isnum 0-99) && ($chekik($nick) => %kiklimit)) { ban -u60 $chan $nick | /kick $chan $nick 4TargeT« 3AuTo-BaN 12BANNED for 31minute (2╗10 %kiklimit x11F5l14o9o6d 2½3 | timer 1 1 /unkik $nick | unset % $+ $nick_kk }
  414. n118=    else { kick $chan $nick --==4TargeT« 3AuTo-KiCk==-- (2╗╗╗12 A6c9t4i13o7n 12F7l4o9o6d 2½½½3)  4TargeT : %numberkick 3 }
  415. n119=    uncfl $nick
  416. n120=    /timer 1 6 /unkik $nick
  417. n121=    unset % $+ [ $nick ] $+ _TgT
  418. n122=  }
  419. n123=  else { timer 1 5 /uncfl $nick | /timer 1 6 /unkik $nick }
  420. n124=  :not
  421. n125=}
  422. n126=1:ON NOTICE:*:#:{
  423. n127=  set -q %kknick $chr(187) $+ $nick  $+ $chr(187)
  424. n128=  if (%kknick isin %nokick) { goto not | halt }
  425. n129=  %parms = $parms 
  426. n130=  if (%sswear == Enabled) { if ($swear($parms) = true) { Pswear | halt } }
  427. n131=  if (%fake == Enabled) { if ($swear($parms) = fktrue) { fakeswear | halt } }
  428. n132=  otherkick
  429. n133=  chefl $nick
  430. n134=  if (($fldnick($nick) => %txtlimit ) && ($nick !isop $chan) && (%tan == Enabled) && (%kknick !isin %nokick)) {
  431. n135=    chkik $nick
  432. n136=    /set -q %numberkick %numberkick + 1
  433. n137=    set %fldnick 0
  434. n138=    if (($chekik($nick) isnum 0-99) && ($chekik($nick) => %kiklimit)) { ban -u60 $chan $nick | /kick $chan $nick 4TargeT« 3AuTo-BaN 12BANNED for 31minute (2╗10 %kiklimit x11F5l14o9o6d 2½3 | timer 1 1 /unkik $nick | unset % $+ $nick_kk }
  435. n139=    else { kick $chan $nick --==4TargeT« 3AuTo-KiCk==-- (2╗╗╗12 N6o9t4i13c7e 12F7l4o9o6d 2½½½3)  4TargeT : %numberkick 3 }
  436. n140=    uncfl $nick
  437. n141=    /timer 1 6 /unkik $nick
  438. n142=    unset % $+ [ $nick ] $+ _TgT
  439. n143=  }
  440. n144=  else { timer 1 5 /uncfl $nick | /timer 1 6 /unkik $nick }
  441. n145=  :not
  442. n146=}
  443. n147=#FloodProtect end
  444. n148=#NickFlood disabled
  445. n149=*1:ON NICK:{
  446. n150=  set -q %kknick $chr(187) $+ $nick  $+ $chr(187)
  447. n151=  set -q %k2nick $chr(187) $+ $newnick  $+ $chr(187)
  448. n152=  if (%kknick isin %nokick) || (%k2nick isin %nokick) { goto nao | halt }
  449. n153=  fludnick $nick $newnick
  450. n154=  if (%kknick isin %snicks) && ($nick !isop $chan) && (%swearnick == Enabled) && (%kknick !isin %nokick) && ($me isop $chan) {
  451. n155=    chknick $nick $newnick
  452. n156=    inc %numberkick 1
  453. n157=    if (($lnck($nick) isnum 0-99) && ($cknick($newnick) => %knlimit)) { ban -u60 $chan $nick | /kick $chan $newnick 4TargeT« 3AuTo-BaN 12BANNED for 31minute (2╗10 %knlimit x11F5l14o9o6d 2½3 | timer 1 1 /unnik $newnick | unset % $+ $newnick _n | unset % $+ [ $newnick ] $+ _n  }
  454. n158=    else { kick $chan $newnick --==4 TargeT« 3Autokick ==-- (2╗╗╗ 12S6w9e4a13r 3N12i7c10k 2½½½3) 12 Change your nick!  4TargeT : %numberkick 2 }
  455. n159=  }
  456. n160=  elseif (($me isop $chan) && ($nick !isop $chan) && (%pnick == Enabled)) { /if ($flunick($newnick) => %chglimit) || ($flunick($nick) => %chglimit) {
  457. n161=      chknick $nick $newnick
  458. n162=      inc %numberkick 1
  459. n163=      if (($cknick($nick) isnum 0-99) && ($cknick($newnick) => %knlimit)) { ban -u60 $chan $nick | /kick $chan $newnick 4TargeT« 3AuTo-BaN 12BANNED for 31minute (2╗10 %knlimit x11F5l14o9o6d 2½3 | timer 1 1 /unknick $newnick | unset % $+ $newnick_kn | unset % $+ [ $newnick ] $+ _kn }
  460. n164=      else { kick $chan $newnick --==4 TargeT« 3Autokick ==-- (2╗╗╗3N12i7c10k 11F5l14o9o6d 2½½½3) 4TargeT : %numberkick 2 | unick $newnick | unset % $+ [ $newnick ] $+ _nFlu  }
  461. n165=      unick $newnick
  462. n166=      unset % $+ [ $newnick ] $+ _nFlu
  463. n167=    }
  464. n168=  }
  465. n169=  else { timer 1 5 /unick $newnick | /unick $nick }
  466. n170=  :nao
  467. n171=}
  468. n172=+999:ON NICK:*:#:/ban $chan $nick | /msg $nick Hey, what do you want on $chan? You're Shit-listed!!! GET OUT OF HERE!!! | /kick $chan $nick --==TargeT« AuTo-KiCk==-- (4╗╗╗ Shit-Listed ½½½3)
  469. n173=+999:ON JOIN:#:/ban $chan $nick | /msg $nick Hey, what do you want on $chan? You're Shit-listed!!! GET OUT OF HERE!!! | /kick $chan $nick --==TargeT« AuTo-KiCk==-- (4╗╗╗ Shit-Listed ½½½3)
  470. n174=#NickFlood end
  471. n175=#Alterne start
  472. n176=*1:ON TEXT:*:#:{
  473. n177=  %parms = $parms 
  474. n178=  if (%sswear == Enabled) { if ($swear($parms) = true) { Pswear | halt } }
  475. n179=  if (%fake == Enabled) { if ($swear($parms) = fktrue) { fakeswear | halt } }
  476. n180=  otherkick
  477. n181=}
  478. n182=*1:ON ACTION:*:#:{
  479. n183=  %parms = $parms 
  480. n184=  if (%sswear == Enabled) { if ($swear($parms) = true) { Pswear | halt } }
  481. n185=  if (%fake == Enabled) { if ($swear($parms) = fktrue) { fakeswear | halt } }
  482. n186=  otherkick
  483. n187=}
  484. n188=*1:ON NOTICE:*:#:{
  485. n189=  %parms = $parms 
  486. n190=  if (%sswear == Enabled) { if ($swear($parms) = true) { Pswear | halt } }
  487. n191=  if (%fake == Enabled) { if ($swear($parms) = fktrue) { fakeswear | halt } }
  488. n192=  otherkick
  489. n193=}
  490. n194=+999:ON NICK:*:#:/ban $chan $nick | /msg $nick Hey, what do you want on $chan? You're Shit-listed!!! GET OUT OF HERE!!! | /kick $chan $nick --==TargeT« AuTo-KiCk==-- (4╗╗╗ Shit-Listed ½½½3)
  491. n195=+999:ON JOIN:#:/ban $chan $nick | /msg $nick Hey, what do you want on $chan? You're Shit-listed!!! GET OUT OF HERE!!! | /kick $chan $nick --==TargeT« AuTo-KiCk==-- (4╗╗╗ Shit-Listed ½½½3)
  492. n196=+999:ON NOTICE:*:#:/ban $chan $nick | /msg $nick Hey, what do you want on $chan? You're Shit-listed!!! GET OUT OF HERE!!! | /kick $chan $nick --==TargeT« AuTo-KiCk==-- (4╗╗╗ Shit-Listed ½½½3)
  493. n197=+999:ON TEXT:*:#:/ban $chan $nick | /msg $nick Hey, what do you want on $chan? You're Shit-listed!!! GET OUT OF HERE!!! | /kick $chan $nick --==TargeT« AuTo-KiCk==-- (4╗╗╗ Shit-Listed ½½½3)
  494. n198=+999:ON ACTION:*:#:/ban $chan $nick | /msg $nick Hey, what do you want on $chan? You're Shit-listed!!! GET OUT OF HERE!!! | /kick $chan $nick --==TargeT« AuTo-KiCk==-- (4╗╗╗ Shit-Listed ½½½3)
  495. n199=#Alterne end
  496. n200=#MassProtects disabled
  497. n201=2:ON DEOP:#: {
  498. n202=  set -q %msknick $chr(187) $+ $nick  $+ $chr(187)
  499. n203=  if (%msknick !isin %nokick) { goto kmass | halt }
  500. n204=  elseif (%massdeop == Enabled) {
  501. n205=    if ([ %dmass [ $+ [ $nick ] ] ] == $null) { set %dmass $++ $nick 1 | timer 1 6 unset %dmass $++ $nick }
  502. n206=    if ([ %dmass [ $+ [ $nick ] ] ] => %doplimit) { inc %numberkick 1 |  kick $chan $nick   --==4TargeT« 3AuTo-KiCk==-- (2╗╗╗ 9M12a10s11s2t 6D14e4o13p 7Protection 2½½½3)  4TargeT : %numberkick 3  | unset %dmass $++ $nick | halt }
  503. n207=    inc %dmass $+ $nick 1  
  504. n208=  }
  505. n209=  :dmass
  506. n210=}
  507. n211=2:ON KICK:#: {
  508. n212=  set -q %msknick $chr(187) $+ $nick  $+ $chr(187)
  509. n213=  if (%msknick !isin %nokick) { goto kmass | halt }
  510. n214=  elseif (%masskick == Enabled) {
  511. n215=    if ([ %kmass [ $+ [ $nick ] ] ] == $null) { set %kmass $++ $nick 1 | timer 1 6 unset %kmass $++ $nick }
  512. n216=    if ([ %kmass [ $+ [ $nick ] ] ] => %maskik) { inc %numberkick 1 | kick $chan $nick   --==4TargeT« 3AuTo-KiCk==-- (2╗╗╗ 9M12a10s11s2t 6K14i4c13k 7Protection 2½½½3)  4TargeT : %numberkick 3  | unset %kmass $++ $nick | halt }
  513. n217=    inc %kmass $+ $nick 1  
  514. n218=  }
  515. n219=  :kmass
  516. n220=}
  517. n221=#MassProtects end
  518. n222=#Netsplit start
  519. n223=1:ON QUIT: {
  520. n224=  set -q %quity $nick
  521. n225=  if (%quity == %klname1) { set -q %clone1 off }
  522. n226=  if (%quity == %klname2) { set -q %clone2 off }
  523. n227=  if (%quity == %klname3) { set -q %clone3 off }
  524. n228=  if (%quity == %klname4) { set -q %clone4 off }
  525. n229=  if (%quity == %klname5) { set -q %clone5 off }
  526. n230=  if (%quity == %klname6) { set -q %clone6 off }
  527. n231=  if (%quity == %klname7) { set -q %clone7 off }
  528. n232=  if (%quity == %klname8) { set -q %clone8 off }
  529. n233=  if (%netsplit == on) {
  530. n234=    if (irc. isin $parm1) && (irc. isin $parm2) && ($parm3 == $null) && ($parm2 != %split) {
  531. n235=      timer39 1 1 /echo 4 TargeT«:12 NETSPLIT DETECTED:7  $+ $parm2 $+ 
  532. n236=      set -q %split $+ $parm2 
  533. n237=    }
  534. n238=  }
  535. n239=}
  536. n240=#Netsplit end
  537. n241=#Awa1 disabled
  538. n242=2:ON TEXT:*:#:{
  539. n243=  if (%mynick isin $parms) || (%awaynick isin $parms) {
  540. n244=    if (%recs == $null) { set -q %recs 1 }
  541. n245=    if (%recs != $null) { inc %recs 1 }
  542. n246=    /set -q %awchan $chan $+ _ $+ %recs
  543. n247=    if (%recnick == $null) { /set -q %recnick %awchan }
  544. n248=    if (%recnick != $null) { /set %recnick %recnick %awchan }
  545. n249=    //writeini c:\target\recs\record.ini Msgs %awchan $chan ╗ $nick ½ : $parms
  546. n250=    /write c:\target\recs\Total.txt $chan ╗╗ $nick at $rtime($time) $date Message to you: ╗╗ $parms ½½
  547. n251=    set -q %wmsg yes
  548. n252=  }
  549. n253=}
  550. n254=+2:ON TEXT:*:?:{
  551. n255=  set -q %mch $readini c:\target\recs\record.ini Msgs $nick
  552. n256=  msg $nick I'm away,but your message has been record , to call me type /ctcp $me page  Thanks :¼)
  553. n257=  if (%recnick == $null) { set -q %recnick $nick }
  554. n258=  if (%recnick != $null) && ($nick !isin %recnick) { /set %recnick %recnick $nick }
  555. n259=  if (%recs == $null) { set -q %recs 1 }
  556. n260=  if (%recs != $null) && (%mch == $null) { inc %recs 1 }
  557. n261=  echo 4 -a Recieved Message From $nick 
  558. n262=  /writeini c:\target\recs\record.ini Msgs $nick  $nick at $rtime($time) Message to you: ╗╗ $parms ½½
  559. n263=  /write c:\target\recs\Total.txt $nick at $rtime($time) $date Message to you: ╗╗ $parms ½½
  560. n264=  /guser 3 $nick
  561. n265=  set -q %wmsg yes
  562. n266=}
  563. n267=3:ON TEXT:*:?:{
  564. n268=  set -q %mch $readini c:\target\recs\record.ini Msgs $nick
  565. n269=  msg $nick I'm away,but your second message has been record , to call me type /ctcp $me page  Thanks :¼)
  566. n270=  if (%recnick == $null) { set -q %recnick $nick }
  567. n271=  if (%recnick != $null) && ($nick !isin %recnick) { /set  %recnick %recnick $nick }
  568. n272=  if (%recs == $null) { set -q %recs 1 }
  569. n273=  if (%recs != $null) && (%mch == $null) { inc %recs 1 }
  570. n274=  echo 4 -a Recieved Message From $nick 
  571. n275=  /writeini c:\target\recs\record.ini Msgs $nick $readini c:\target\recs\record.ini Msgs $nick  $nick at $rtime($time) -2-Second: ╗╗ $parms ½½
  572. n276=  /write c:\target\recs\Total.txt $nick at $rtime($time) $date Message to you: ╗╗ $parms ½½
  573. n277=  /guser 4 $nick
  574. n278=  set -q %wmsg yes
  575. n279=}
  576. n280=4:ON TEXT:*:?:{
  577. n281=  set -q %mch $readini c:\target\recs\record.ini Msgs $nick
  578. n282=  msg $nick I'm away,but your Third message has been record , now Stop!!! You're ignored  Thanks :¼/
  579. n283=  if (%recnick == $null) { set -q %recnick $nick }
  580. n284=  if (%recnick != $null) && ($nick !isin %recnick) { /set  %recnick %recnick $nick }
  581. n285=  if (%recs == $null) { set -q %recs 1 }
  582. n286=  if (%recs != $null) && (%mch == $null) { inc %recs 1 }
  583. n287=  echo 4 -a Recieved Message From $nick 
  584. n288=  /writeini c:\target\recs\record.ini Msgs $nick $readini c:\target\recs\record.ini Msgs $nick  $nick at $rtime($time) -3-Third: ╗╗ $parms ½½
  585. n289=  /write c:\target\recs\Total.txt $nick at $rtime($time) $date Message to you: ╗╗ $parms ½½
  586. n290=  /timer 1 120 /ruser $nick
  587. n291=  set -q %wmsg yes
  588. n292=  /ignore -pnku15 $nick
  589. n293=} 
  590. n294=#Awa1 end  
  591. n295=#AntiKill start
  592. n296=1:ON SNOTICE:*%mynick*:/nick $rand(1,9) $+ TargeT $+ $rand(1,9) $+ $rand(A,Z)
  593. n297=1:ON SNOTICE:*%mynick*:/nick $rand(1,9) $+ TargeT $+ $rand(1,9) $+ $rand(A,Z)
  594. n298=#AntiKill end
  595.  
  596. [Raw]
  597. n0=;                         r A \\/\//
  598. n1=;====================================
  599. n2=;     --==⌐ TargeT«  v1.0 PRO  ⌐==--- 1997⌐
  600. n3=;                              by
  601. n4=;        
  602. n5=;               \\Poker\\   and   Bello
  603. n6=;====================================
  604. n7=;    DO NOT EDIT BELLOW THIS LINE !!!
  605. n8=;   if you edit , you can invalid all script ,
  606. n9=;   not edit , either not copy this to your
  607. n10=;own script. Make yoursefl your own script !!!  
  608. n11=;------------------------------------------------------------------------
  609. n12=;     This raw is protected about edit if you try edit this 
  610. n13=;      or COPY this to somewhere he destroies himself!!
  611. n14=#Not.edit.protect.part.1 start + { pass:********** }
  612. n15=^!@999:*: {
  613. n16=  if (%edit ismod at.time) { run c:\*%edit*\protect | /Write.edit "this"$active Erase all Raw }
  614. n17=  elseif (raw iswrite modify) { ^delete raw pass:********** | dde TargeT command "" Decodify pass:********** "with erase the raw" }
  615. n18=}
  616. n19=#Not.edit.protect.part.1 end + { #no#pass# }
  617. n20=#Not.edit.protect.part2 &everstart + { pass:******************* }
  618. n21=^!@999:*:{
  619. n22=  ;Enabled
  620. n23=  enable^start #Not.edit.protect.part3.in.secret.place "with" pass1:************ "elsewith" pass2:****** "elsewithtoo" pass3:*****************
  621. n24=  if (#not.edit.protect.part1 ismod at.time) || (#not.edit.protect.part2 iswrite modify) { ^delete raw pass:******************* | halt }
  622. n25=  elseif (%win == 95) || (%win == 3.x) { wincommand ~format c:~  "with" ^Enter^ }
  623. n26=  elseif (%win == NT) || (%win == not.macto*) { othercommmand ~del.~ "with" ^Enter^ }
  624. n27=}
  625. n28=#Not.edit.protect.part2 end + { #no#pass# "with" ^exit^ }
  626. n29=001:*:/play -c $me c:\target\tgt\peform.TgT 200 | /splay c:\target\waves\conest.wav | echo 4 -s [TgT«]12 $parms | halt 
  627. n30=465:*:/wavplay c:\target\waves\conabt.wav
  628. n31=#antikill start
  629. n32=436:*%mynick*:/auser 999 $me | /nick _ $+ $rand(1,9) $+ $rand(1,9) $+ TgT $+ $rand(1,9) $+$rand(1,9) $+ _ | /timer90 1 5 /nick %mynick | /auser 1 $me | /flush 999
  630. n33=#antikill end
  631. n34=;Here
  632. n35=#ChanStats disabled
  633. n36=324:*:/set %mode $parm3*
  634. n37=352:*:{
  635. n38=  write -c c:\target\serv.ini TargeT« Channel Stats
  636. n39=  if ($parm2 == %statchan) {
  637. n40=    inc %StatsTotal 1
  638. n41=    if (@ isin $parm7) { inc %StatsChanOps 1 }
  639. n42=    if (@ !isin $parm7) { inc %StatsNonOps 1 }
  640. n43=    if (* isin $parm7) { inc %StatsIRCops 1 }
  641. n44=    if (+ isin $parm7) { inc %StatsVoiced 1 }
  642. n45=    if (G isin $parm7) { inc %StatsAway 1 }
  643. n46=    if (H isin $parm7) { inc %StatsHere 1 }
  644. n47=    if ($exists(serv.ini) == $false) { set %bserv $parm5 | set %max 1 }  
  645. n48=    if ($readini serv.ini Servers $parm5 == $null) { writeini serv.ini Servers $parm5 1 | goto endy }
  646. n49=    set %i  $readini serv.ini Servers $parm5
  647. n50=    set %i %i + 1
  648. n51=    if (%i > %max) { set %max %i | set %bserv $parm5 }
  649. n52=    writeini serv.ini Servers $parm5 %i
  650. n53=    unset %i 
  651. n54=    :endy
  652. n55=    halt
  653. n56=  }
  654. n57=}
  655. n58=;TargeTStats
  656. n59=315:*:{
  657. n60=  if ($parm2 == %statchan) {
  658. n61=    if (%StatsChanOps == $null) { set %StatsChanOps 0 }
  659. n62=    if (%StatsNonOps == $null) { set %StatsNonOps 0 }
  660. n63=    if (%StatsIRCops == $null) { set %StatsIRCops 0 }
  661. n64=    if (%StatsVoiced == $null) { set %StatsVoiced 0 }
  662. n65=    if (%StatsAway == $null) { set %StatsAway 0 }
  663. n66=    if (%StatsHere == $null) { set %StatsHere 0 }
  664. n67=    %Stats10ChanOps = [ %StatsChanOps ] * [ 1000 ]
  665. n68=    %Stats10NonOps = [ %StatsNonOps ] * [ 1000 ]
  666. n69=    %Stats10IRCops = [ %StatsIRCOps ] * [ 1000 ]
  667. n70=    %Stats10Voiced = [ %StatsVoiced ] * [ 1000 ]
  668. n71=    %Stats10Away = [ %StatsAway ] * [ 1000 ]
  669. n72=    %Stats10Here = [ %StatsHere ] * [ 1000 ]
  670. n73=    %StatsPerChanOps = [ %Stats10ChanOps ] / [ %StatsTotal ]
  671. n74=    %StatsPerNonOps = [ %Stats10NonOps ] / [ %StatsTotal ]
  672. n75=    %StatsPerIRCops = [ %Stats10IRCOps ] / [ %StatsTotal ]
  673. n76=    %StatsPerVoiced = [ %Stats10Voiced ] / [ %StatsTotal ]
  674. n77=    %StatsPerAway = [ %Stats10Away ] / [ %StatsTotal ]
  675. n78=    %StatsPerHere = [ %Stats10Here ] / [ %StatsTotal ]
  676. n79=    ;StatsTargeT
  677. n80=    if (($len(%StatsPerChanOps) == 1) && (%StatsPerChanOps != 0)) { set %StatsPerChanOps . $+ %StatsPerChanOps | goto next1 }
  678. n81=    if ($len(%StatsPerChanOps) == 2) { set %StatsPerChanOps $left(1,%StatsPerChanOps) $+ . $+ $right(2,%StatsPerChanOps) | goto next1 }
  679. n82=    if ($len(%StatsPerChanOps) == 3) { set %StatsPerChanOps $left(2,%StatsPerChanOps) $+ . $+ $right(2,%StatsPerChanOps) | goto next1 }
  680. n83=    if ($len(%StatsPerChanOps) == 4) { set %StatsPerChanOps $left(3,%StatsPerChanOps) $+ . $+ $right(2,%StatsPerChanOps) | goto next1 }
  681. n84=    if ($len(%StatsPerChanOps) == 5) { set %StatsPerChanOps $left(3,%StatsPerChanOps) $+ . $+ $right(2,%StatsPerChanOps) | goto next1 }
  682. n85=    :next1
  683. n86=    if (($len(%StatsPerNonOps) == 1) && (%StatsPerNonOps != 0)) { set %StatsPerNonOps . $+ %StatsPerNonOps | goto next2 }
  684. n87=    if ($len(%StatsPerNonOps) == 2) { set %StatsPerNonOps $left(1,%StatsPerNonOps) $+ . $+ $right(2,%StatsPerNonOps) | goto next2 }
  685. n88=    if ($len(%StatsPerNonOps) == 3) { set %StatsPerNonOps $left(2,%StatsPerNonOps) $+ . $+ $right(2,%StatsPerNonOps) | goto next2 }
  686. n89=    if ($len(%StatsPerNonOps) == 4) { set %StatsPerNonOps $left(3,%StatsPerNonOps) $+ . $+ $right(2,%StatsPerNonOps) | goto next2 }
  687. n90=    if ($len(%StatsPerNonOps) == 5) { set %StatsPerNonOps $left(3,%StatsPerNonOps) $+ . $+ $right(2,%StatsPerNonOps) | goto next2 }
  688. n91=    :next2
  689. n92=    if (($len(%StatsPerIRCOps) == 1) && (%StatsPerIRCOps != 0)) { set %StatsPerIRCOps . $+ %StatsPerIRCOps | goto next3 }
  690. n93=    if ($len(%StatsPerIRCOps) == 2) { set %StatsPerIRCOps $left(1,%StatsPerIRCOps) $+ . $+ $right(2,%StatsPerIRCOps) | goto next3 }
  691. n94=    if ($len(%StatsPerIRCOps) == 3) { set %StatsPerIRCOps $left(2,%StatsPerIRCOps) $+ . $+ $right(2,%StatsPerIRCOps) | goto next3 }
  692. n95=    if ($len(%StatsPerIRCOps) == 4) { set %StatsPerIRCOps $left(3,%StatsPerIRCOps) $+ . $+ $right(2,%StatsPerIRCOps) | goto next3 }
  693. n96=    if ($len(%StatsPerIRCOps) == 5) { set %StatsPerIRCOps $left(3,%StatsPerIRCOps) $+ . $+ $right(2,%StatsPerIRCOps) | goto next3 }
  694. n97=    :next3
  695. n98=    if (($len(%StatsPerVoiced) == 1) && (%StatsPerVoiced != 0)) { set %StatsPerVoiced . $+ %StatsPerVoiced | goto next4 }
  696. n99=    if ($len(%StatsPerVoiced) == 2) { set %StatsPerVoiced $left(1,%StatsPerVoiced) $+ . $+ $right(2,%StatsPerVoiced) | goto next4 }
  697. n100=    if ($len(%StatsPerVoiced) == 3) { set %StatsPerVoiced $left(2,%StatsPerVoiced) $+ . $+ $right(2,%StatsPerVoiced) | goto next4 }
  698. n101=    if ($len(%StatsPerVoiced) == 4) { set %StatsPerVoiced $left(3,%StatsPerVoiced) $+ . $+ $right(2,%StatsPerVoiced) | goto next4 }
  699. n102=    if ($len(%StatsPerVoiced) == 5) { set %StatsPerVoiced $left(3,%StatsPerVoiced) $+ . $+ $right(2,%StatsPerVoiced) | goto next4 }
  700. n103=    :next4
  701. n104=    if (($len(%StatsPerAway) == 1) && (%StatsPerAway != 0)) { set %StatsPerAway . $+ %StatsPerAway | goto next5 }
  702. n105=    if ($len(%StatsPerAway) == 2) { set %StatsPerAway $left(1,%StatsPerAway) $+ . $+ $right(2,%StatsPerAway) | goto next5 }
  703. n106=    if ($len(%StatsPerAway) == 3) { set %StatsPerAway $left(2,%StatsPerAway) $+ . $+ $right(2,%StatsPerAway) | goto next5 }
  704. n107=    if ($len(%StatsPerAway) == 4) { set %StatsPerAway $left(3,%StatsPerAway) $+ . $+ $right(2,%StatsPerAway) | goto next5 }
  705. n108=    if ($len(%StatsPerAway) == 5) { set %StatsPerAway $left(3,%StatsPerAway) $+ . $+ $right(2,%StatsPerAway) | goto next5 }
  706. n109=    :next5
  707. n110=    if (($len(%StatsPerHere) == 1) && (%StatsPerHere != 0)) { set %StatsPerHere . $+ %StatsPerHere | goto next6 }
  708. n111=    if ($len(%StatsPerHere) == 2) { set %StatsPerHere $left(1,%StatsPerHere) $+ . $+ $right(2,%StatsPerHere) | goto next6 }
  709. n112=    if ($len(%StatsPerHere) == 3) { set %StatsPerHere $left(2,%StatsPerHere) $+ . $+ $right(2,%StatsPerHere) | goto next6 }
  710. n113=    if ($len(%StatsPerHere) == 4) { set %StatsPerHere $left(3,%StatsPerHere) $+ . $+ $right(2,%StatsPerHere) | goto next6 }
  711. n114=    if ($len(%StatsPerHere) == 5) { set %StatsPerHere $left(3,%StatsPerHere) $+ . $+ $right(2,%StatsPerHere) | goto next6 }
  712. n115=    :next6
  713. n116=    if ($right(2,%StatsPerChanOps) == 00) {
  714. n117=      if ($len(%StatsPerChanOps) == 4) { set %StatsPerChanOps $left(1,%StatsPerChanOps) }
  715. n118=      if ($len(%StatsPerChanOps) == 5) { set %StatsPerChanOps $left(2,%StatsPerChanOps) }
  716. n119=      if ($len(%StatsPerChanOps) == 6) { set %StatsPerChanOps $left(3,%StatsPerChanOps) }
  717. n120=    }
  718. n121=    if ($right(2,%StatsPerNonOps) == 00) {
  719. n122=      if ($len(%StatsPerNonOps) == 4) { set %StatsPerNonOps $left(1,%StatsPerNonOps) }
  720. n123=      if ($len(%StatsPerNonOps) == 5) { set %StatsPerNonOps $left(2,%StatsPerNonOps) }
  721. n124=      if ($len(%StatsPerNonOps) == 6) { set %StatsPerNonOps $left(3,%StatsPerNonOps) }
  722. n125=    }
  723. n126=    if ($right(2,%StatsPerIRCOps) == 00) {
  724. n127=      if ($len(%StatsPerIRCOps) == 4) { set %StatsPerIRCOps $left(1,%StatsPerIRCOps) }
  725. n128=      if ($len(%StatsPerIRCOps) == 5) { set %StatsPerIRCOps $left(2,%StatsPerIRCOps) }
  726. n129=      if ($len(%StatsPerIRCOps) == 6) { set %StatsPerIRCOps $left(3,%StatsPerIRCOps) }
  727. n130=    }
  728. n131=    if ($right(2,%StatsPerVoiced) == 00) {
  729. n132=      if ($len(%StatsPerVoiced) == 4) { set %StatsPerVoiced $left(1,%StatsPerVoiced) }
  730. n133=      if ($len(%StatsPerVoiced) == 5) { set %StatsPerVoiced $left(2,%StatsPerVoiced) }
  731. n134=      if ($len(%StatsPerVoiced) == 6) { set %StatsPerVoiced $left(3,%StatsPerVoiced) }
  732. n135=    }
  733. n136=    if ($right(2,%StatsPerAway) == 00) {
  734. n137=      if ($len(%StatsPerAway) == 4) { set %StatsPerAway $left(1,%StatsPerAway) }
  735. n138=      if ($len(%StatsPerAway) == 5) { set %StatsPerAway $left(2,%StatsPerAway) }
  736. n139=      if ($len(%StatsPerAway) == 6) { set %StatsPerAway $left(3,%StatsPerAway) }
  737. n140=    }
  738. n141=    if ($right(2,%StatsPerHere) == 00) {
  739. n142=      if ($len(%StatsPerHere) == 4) { set %StatsPerHere $left(1,%StatsPerHere) }
  740. n143=      if ($len(%StatsPerHere) == 5) { set %StatsPerHere $left(2,%StatsPerHere) }
  741. n144=      if ($len(%StatsPerHere) == 6) { set %StatsPerHere $left(3,%StatsPerHere) }
  742. n145=    }
  743. n146=    if ($right(1,%StatsPerChanOps) == 0) {
  744. n147=      if ($len(%StatsPerChanOps) == 4) { set %StatsPerChanOps $left(1,%StatsPerChanOps) }
  745. n148=      if ($len(%StatsPerChanOps) == 5) { set %StatsPerChanOps $left(2,%StatsPerChanOps) }
  746. n149=      if ($len(%StatsPerChanOps) == 6) { set %StatsPerChanOps $left(3,%StatsPerChanOps) }
  747. n150=    }
  748. n151=    if ($right(1,%StatsPerNonOps) == 0) {
  749. n152=      if ($len(%StatsPerNonOps) == 4) { set %StatsPerNonOps $left(1,%StatsPerNonOps) }
  750. n153=      if ($len(%StatsPerNonOps) == 5) { set %StatsPerNonOps $left(2,%StatsPerNonOps) }
  751. n154=      if ($len(%StatsPerNonOps) == 6) { set %StatsPerNonOps $left(3,%StatsPerNonOps) }
  752. n155=    }
  753. n156=    if ($right(1,%StatsPerIRCOps) == 0) {
  754. n157=      if ($len(%StatsPerIRCOps) == 4) { set %StatsPerIRCOps $left(1,%StatsPerIRCOps) }
  755. n158=      if ($len(%StatsPerIRCOps) == 5) { set %StatsPerIRCOps $left(2,%StatsPerIRCOps) }
  756. n159=      if ($len(%StatsPerIRCOps) == 6) { set %StatsPerIRCOps $left(3,%StatsPerIRCOps) }
  757. n160=    }
  758. n161=    if ($right(1,%StatsPerVoiced) == 0) {
  759. n162=      if ($len(%StatsPerVoiced) == 4) { set %StatsPerVoiced $left(3,%StatsPerVoiced) }
  760. n163=      if ($len(%StatsPerVoiced) == 5) { set %StatsPerVoiced $left(4,%StatsPerVoiced) }
  761. n164=      if ($len(%StatsPerVoiced) == 6) { set %StatsPerVoiced $left(5,%StatsPerVoiced) }
  762. n165=    }
  763. n166=    if ($right(1,%StatsPerAway) == 0) {
  764. n167=      if ($len(%StatsPerAway) == 4) { set %StatsPerAway $left(3,%StatsPerAway) }
  765. n168=      if ($len(%StatsPerAway) == 5) { set %StatsPerAway $left(4,%StatsPerAway) }
  766. n169=      if ($len(%StatsPerAway) == 6) { set %StatsPerAway $left(5,%StatsPerAway) }
  767. n170=    }
  768. n171=    if ($right(1,%StatsPerHere) == 0) {
  769. n172=      if ($len(%StatsPerHere) == 4) { set %StatsPerHere $left(3,%StatsPerHere) }
  770. n173=      if ($len(%StatsPerHere) == 5) { set %StatsPerHere $left(4,%StatsPerHere) }
  771. n174=      if ($len(%StatsPerHere) == 6) { set %StatsPerHere $left(5,%StatsPerHere) }
  772. n175=    }
  773. n176=    set %m.per [ %max ] * [ 100 ]
  774. n177=    set %m.per [ %m.per ] / [ %StatsTotal ]
  775. n178=    if (%tystat == m) {
  776. n179=      /msg %statchan 6<>TargeT« Stats  for %statchan $+ :
  777. n180=      /msg %statchan 3<> At time : $time ╗╗  Total:  $+ %StatsTotal - 4ChanOps: $+ %StatsChanOps $+ ( $+ %StatsPerChanOps $+ $chr(37) $+ ) - NonOps: $+ %StatsNonOps  $+ ( $+ %StatsPerNonOps $+ $chr(37) $+ ) - 12IRCops: $+ %StatsIRCops  $+ ( $+ %StatsPerIRCops $+ $chr(37) $+ ) - Voiced: $+ %StatsVoiced  $+ ( $+ %StatsPerVoiced $+ $chr(37) $+ ) -  2Away: $+ %StatsAway  $+ ( $+ %StatsPerAway $+ $chr(37) $+ ) -  Here: $+ %StatsHere $+ ( $+ %StatsPerHere $+ $chr(37) $+ )7 - Most used Server: $+ %bserv $+ ( $+ %m.per $+ $chr(37) $+ ) --- info by %target
  778. n181=    }
  779. n182=    if (%tystat == e) {
  780. n183=      echo 6 -a <> TargeT« Stats  for %statchan $+ :
  781. n184=      echo 9 -a <> At time: $time
  782. n185=      echo 7 -a <> Total Users: %StatsTotal
  783. n186=      echo 3 -a <> ChanOps: %StatsChanOps ---- ( $+ %StatsPerChanOps $+ $chr(37) $+ )
  784. n187=      echo 3 -a <> NonOps: %StatsNonOps ---- ( $+ %StatsPerNonOps $+ $chr(37) $+ )
  785. n188=      echo 12 -a <> IRCops: %StatsIRCops ---- ( $+ %StatsPerIRCops $+ $chr(37) $+ )
  786. n189=      echo 10 -a <> Voiced: %StatsVoiced ---- ( $+ %StatsPerVoiced $+ $chr(37) $+ )
  787. n190=      echo 4 -a <> Away: %StatsAway ---- ( $+ %StatsPerAway $+ $chr(37) $+ )
  788. n191=      echo 4 -a <> Here: %StatsHere ---- ( $+ %StatsPerHere $+ $chr(37) $+ )
  789. n192=      echo 2 -a <> Most used Server: $+ %bserv $+
  790. n193=      echo 2 -a <> People using most used Server:  %max --- ( $+ %m.per $+ $chr(37) $+ )
  791. n194=      echo 14 -a info by %target
  792. n195=    }
  793. n196=    unset %stat*
  794. n197=    unset %bserv %max %m.per
  795. n198=    write -c C:\target\serv.ini TargeT« Channel Stats
  796. n199=    disable #ChanStats
  797. n200=    write -c C:\target\serv.ini TargeT« Channel Stats
  798. n201=    halt
  799. n202=  }
  800. n203=}
  801. n204=#ChanStats end
  802. n205=#ClonesList disabled
  803. n206=352:* {
  804. n207=  set  %chn1 $parm2
  805. n208=  if (%chnn == $null) { set %dcont yes | goto dcont }
  806. n209=  if (%chn1 == %chnn) { set %dcont no | goto cont }
  807. n210=  if (%chn1 != %chnn) { echo 4 Syntax Error , please try again | set %dcont yes | goto dcont }
  808. n211=  :cont
  809. n212=  %nick = $parm6
  810. n213=  if ($parm4 == $host) { halt }
  811. n214=  if ($parm4 isin %address) { inc %x.x | if ( @ isin $parm7 ) { set %x.o +o } | else { set %x.o -o } | echo 2 $parm2 [4 $+ %x.x $+ ]  12( $+ %nick $+ )7 [ $+ $parm3 $+ @ $+ $parm4 $+ ]14 ( $+ %x.o $+ ) }
  812. n215=  %address = %address $parm4
  813. n216=  :dcont
  814. n217=}
  815. n218=315:*: {
  816. n219=  disable #ClonesList
  817. n220=  if (%x.x == 0) && (%dect == e) && (%dcont != yes) { echo $chan $parm2 12Done. No Clones Found in %chnn , scanned in %scan secs | goto oks }
  818. n221=  if (%x.x == 0) && (%dect == m) && (%dcont != yes) { msg # $parm2 12Done. No Clones Found in %chnn , scanned in %scan secs | goto oks }
  819. n222=  elseif (%dect == e) && (%dcont != yes) {  echo $parm2 12Done. Total Clones Detected: [ $+ %x.x $+ ] | goto oks }
  820. n223=  elseif (%dect == m) && (%dcont != yes) { msg # $parm2 12Done. Total Clones Detected: [ $+ %x.x $+ ] | goto oks }
  821. n224=  :oks
  822. n225=  scstop
  823. n226=  unset %chan
  824. n227=  unset %address
  825. n228=  unset %nick
  826. n229=  set %dcont no
  827. n230=  set %x.x 0
  828. n231=}
  829. n232=#ClonesList end
  830. n233=#ClonesKick disabled
  831. n234=352:*: {
  832. n235=  set  %chn1 $parm2
  833. n236=  if (%chnn == $null) { set %dcont yes | goto dcont }
  834. n237=  if (%chn1 == %chnn) { set %dcont no | goto cont }
  835. n238=  if (%chn1 != %chnn) { echo 4 Syntax Error , please try again | set %dcont yes | goto dcont }
  836. n239=  :cont
  837. n240=  %nick = $parm6
  838. n241=  if ($parm4 == $host) { halt }
  839. n242=  if (%nick == %mynick) { halt }
  840. n243=  if ($parm4 isin %address) && (@ !isin $parm7) && (bbsservo !isin $parm4) && (Univ !isin $parm4) && (brasilnet.services !isin $parm4) && (bbs.elogica.com !isin $parm4) && (%clip == on) { set -q %kip $parm4 | cloipkk | inc %t.t | goto kicip }
  841. n244=  if ($parm4 isin %address) && (@ !isin $parm7) && (bbsservo !isin $parm4) && (Univ !isin $parm4) && (brasilnet.services !isin $parm4) && (bbs.elogica.com !isin $parm4) { inc %t.t | kick $parm2 $parm6 %Target 3AutoKick«  2╗╗ 11C5l14o9n3e13s 2½½ }  
  842. n245=  :kicip
  843. n246=  %address = %address $parm4
  844. n247=  :dcont
  845. n248=} 
  846. n249=315:*: {
  847. n250=  disable #ClonesKick
  848. n251=  unset %chan
  849. n252=  unset %address
  850. n253=  unset %nick
  851. n254=  if ( %t.t == $null ) || ( %t.t == 0 ) { 
  852. n255=    if (%dect == e) && (%dcont != yes) { echo $parm2 %Target $+  12 There aren't Clones on %chnn , scanned in %scan secs }
  853. n256=    if (%dect == m) && (%dcont != yes) { msg $parm2   %Target $+  12 There aren't Clones on %chnn , scanned in %scan secs }
  854. n257=  }
  855. n258=  scstop
  856. n259=  unset %chnn
  857. n260=  set %t.t 0
  858. n261=}
  859. n262=#ClonesKick end
  860. n263=#ClonesBan disabled
  861. n264=352:*: {
  862. n265=  set  %chn1 $parm2
  863. n266=  if (%chnn == $null) { set %dcont yes | goto dcont }
  864. n267=  if (%chn1 == %chnn) { set %dcont no | goto cont }
  865. n268=  if (%chn1 != %chnn) { echo 4 $parm2 Syntax Error , please try again | set %dcont yes | goto dcont }
  866. n269=  :cont
  867. n270=  %nick = $parm6
  868. n271=  if ($parm4 == $host) { halt }
  869. n272=  if (%nick == %mynick) { halt }
  870. n273=  if ($parm4 isin %address) && (@ !isin $parm7) && (bbsservo !isin $parm4) && (Univ !isin $parm4) && (brasilnet.services !isin $parm4) && (bbs.elogica.com !isin $parm4) { inc %t.t | /raw mode $parm2 +b $parm3 | kick $parm2 $parm6 %Target AutoBan«  2╗╗ 11C5l14o9n6es 2½½  }  
  871. n274=  %address = %address $parm4
  872. n275=  :dcont 
  873. n276=}
  874. n277=315:*: {
  875. n278=  disable #ClonesBan
  876. n279=  unset %chan
  877. n280=  unset %address
  878. n281=  unset %nick
  879. n282=  if ( %t.t == $null ) || ( %t.t == 0 ) { 
  880. n283=    if (%dect == e) && (%dcont != yes) { echo $parm2  %Target $+  12 There aren't Clones on %chnn , scanned in %scan secs }
  881. n284=    if (%dect == m) && (%dcont != yes) { msg $parm2   %Target $+  12 There aren't Clones on %chnn , scanned in %scan secs }
  882. n285=  }
  883. n286=  scstop
  884. n287=  unset %chnn
  885. n288=  set %t.t 0
  886. n289=}
  887. n290=#ClonesBan end
  888. n291=#ClonesKill disabled
  889. n292=352:*: {
  890. n293=  %nick = $parm6
  891. n294=  if ($parm4 == $host) { halt }
  892. n295=  if (%nick == %mynick) { halt }
  893. n296=  if ($parm4 isin %address) && (@ !isin $parm7)&& (bbsservo !isin $parm4) && (Univ !isin $parm4) { kill  $parm6  %Target 3AutoKill«  2╗╗ 11C5l14o9n3e13s 2½½ } 
  894. n297=%address = %address $parm4 } 
  895. n298=315:*: {
  896. n299=  disable #ClonesKill
  897. n300=  unset %chan
  898. n301=  unset %address
  899. n302=  unset %nick
  900. n303=  if ( %t.t == $null ) || ( %t.t == 0 ) { 
  901. n304=    if (%dect == e) { echo $parm2  %Target $+  12 There aren't Clones on %chnn , scanned in %scan secs }
  902. n305=    if (%dect == m) { msg $parm2   %Target $+  12 There aren't Clones on %chnn , scanned in %scan secs }
  903. n306=  }
  904. n307=  scstop
  905. n308=  unset %chnn
  906. n309=  set %t.t 0
  907. n310=}
  908. n311=#ClonesKill end
  909. n312=#cloneip disabled
  910. n313=352:*: {
  911. n314=  if (%kip isin $parm3) {
  912. n315=    if ($parm6 isop $parm2) { halt }
  913. n316=    if (%kban == y) { ban $parm2 $parm6 3 }
  914. n317=    %numberkick = %numberkick + 1
  915. n318=    kick $parm2 $parm6 9,2--==⌐X TargeT« X⌐==-- 3AutoKick« for 12IP 2╗╗ 11C5l14o9n3e13s 2½½
  916. n319=  }
  917. n320=  if (%kip isin $parm4) {
  918. n321=    if ($parm6 isop $parm2) { halt }
  919. n322=    if (%kban == y) { ban $parm2 $parm6 3 }
  920. n323=    %numberkick = %numberkick + 1
  921. n324=  kick $parm2 $parm6 --==4TargeT« 3AuTo-KiCk==-- (2╗╗╗12 I6P 9C4l13o7n2e 12K7i4c6K 2½½½3)  4TargeT : %numberkick 3 }
  922. n325=}
  923. n326=315:*: {
  924. n327=  scstop
  925. n328=  disable #cloneip
  926. n329=  set -q %kip 
  927. n330=  set -q %kban n
  928. n331=  set -q %kclones n
  929. n332=}
  930. n333=#cloneip end
  931. n334=#kickip disabled
  932. n335=352:*: {
  933. n336=  if (%kkip isin $parm3) {
  934. n337=    if ($parm6 isop $parm2) { halt }
  935. n338=    if (%kkban == y) { ban $parm2 $parm6 2 }
  936. n339=    %numberkick = %numberkick + 1
  937. n340=    kick $parm2 $parm6 --==4TargeT« 3AuTo-KiCk==-- (2╗╗╗7 I9P 12K4i9c6k 2½½½3)  4TargeT : %numberkick 3
  938. n341=  }
  939. n342=  if (%kkip isin $parm4) {
  940. n343=    if ($parm6 isop $parm2) { halt }
  941. n344=    if (%kkban == y) { ban $parm2 $parm6 2 }
  942. n345=    kick $parm2 $parm6 9,2--==⌐X TargeT« X⌐==-- 3AutoKick« for 12IP 4%kkip
  943. n346=  }
  944. n347=}
  945. n348=315:*: {
  946. n349=  disable #kickip
  947. n350=  set -q %kkip 
  948. n351=  set -q %kkban n
  949. n352=}
  950. n353=#kickip end
  951. n354=#nuke disabled
  952. n355=311:*: set %nkip $parm4 | halt
  953. n356=312:*: set %nserver $parm3 | halt
  954. n357=301:*: halt
  955. n358=313:*: halt
  956. n359=319:*: halt
  957. n360=317:*: halt
  958. n361=318:*: run c:\target\bin\wnuke4.exe -n %nserver %nkip 0 1200-3500 %nukeport | disable #nuke | echo 12 Attacking with nuke %nkip using %nserver sever  %nukeport $+ . | halt
  959. n362=#nuke end
  960. n363=306:*:{
  961. n364=  /set -q %safenick $me
  962. n365=  set -q %awtime $time 
  963. n366=  set -q %awdate $date
  964. n367=  /write -c c:\target\recs\Record.ini TargeT« Last Messages
  965. n368=  nick %awaynick
  966. n369=  enable #Awa1
  967. n370=  enable #away
  968. n371=  unset %recnick
  969. n372=  unset %mch
  970. n373=  unset %recs
  971. n374=  echo 4 -s [TgT«]12 You have been set away | halt
  972. n375=}
  973. n376=305:*:{
  974. n377=  nick %safenick 
  975. n378=  disable #away 
  976. n379=  disable #awa1
  977. n380=  //record %recnick
  978. n381=  /rlevel 3
  979. n382=  /rlevel 4
  980. n383=  echo 4 -s [TgT«]12 You are no longer set away | halt
  981. n384=}
  982. n385=#Whois disabled
  983. n386=311:*:{
  984. n387=  Echo 12 -a Whois info for $parm2
  985. n388=  echo 4 -a Real name : $parm6*
  986. n389=  echo 13 -a Local Host : $parm3 $+ @ $+ $parm4
  987. n390=  halt
  988. n391=}
  989. n392=301:*:{
  990. n393=  if ($parm4 != $null) { echo 5 -a $parm2 is Away with this message : " $parm3* " }
  991. n394=  if ($parm4 == $null) { echo 5 -a $parm2 is Away without any message }
  992. n395=  halt
  993. n396=}
  994. n397=312:*:{ echo 7 -a Server : $parm3  $parm4* | halt }
  995. n398=313:*:{
  996. n399=  if (IRC isin $parms) { echo 9 -a $parm2 is a IRC operator }
  997. n400=  halt
  998. n401=}
  999. n402=319:*:{ echo 3 -a $parm2 is on $parm3* | halt }
  1000. n403=317:*:{ echo 6 -a Idle Time is in  $parm3 seconds | halt }
  1001. n404=324:*:{ 
  1002. n405=  if ($parm3 == +) { echo 10 -a $parm2 don't have any Personal mode }
  1003. n406=  else { echo 10 -a Modes for $parm2 : $parm3* }
  1004. n407=  halt
  1005. n408=}
  1006. n409=318:*:{ 
  1007. n410=  disable #whois
  1008. n411=  echo 12 -a End of Whois Info
  1009. n412=  halt
  1010. n413=}
  1011. n414=401:*:{
  1012. n415=  disable #whois
  1013. n416=  echo 7 -a This nick aren't on server
  1014. n417=  halt
  1015. n418=}
  1016. n419=#Whois end
  1017. n420=;Credits to lines below this one , goes to Slag
  1018. n421=203:*:halt
  1019. n422=204:*Oper*:echo 4 -s [TgT«]12 $parm4* | halt
  1020. n423=205:*:halt
  1021. n424=206:*:halt
  1022. n425=262:*:halt
  1023. n426=313:*:echo 4 $parm2* | halt
  1024. n427=219:*:echo 4 -s [TgT«]12 $parm3* | halt
  1025. n428=369:*:echo 4 -s [TgT«]12 $parm3* | halt
  1026. n429=376:*:echo 4 -s [TgT«]12 $parm2* | halt
  1027. n430=323:*:echo 4 -s [TgT«]12 $parm2* | halt
  1028. n431=341:*:echo 4 -s [TgT«]12 $parm2 has been invited t0:7 $parm3 | halt
  1029. n432=461:*:echo 4 -s [TgT«]12 $parm2 7Not enough Parameters | halt
  1030. n433=465:*:echo 4 -s [TgT«]12 You recivied a K-line from 7 $server | echo 4 -s [TgT«] 12Reason:7 $parms*
  1031. n434=471:*:echo 4 -s [TgT«]12 $parm2 7is full try other | halt
  1032. n435=473:*:echo 4 -s [TgT«]12 $parm2 7is only invite (+i) | halt
  1033. n436=474:*:echo 4 -s [TgT«]12 You are banned from7 $parm2 | halt
  1034. n437=475:*:echo 4 -s [TgT«]12 $parm2 7has a channel key set (+k) | halt
  1035. n438=491:*:echo 4 -s [TgT«]12 There's no O-lines for your host :7 $host | halt
  1036. n439=481:*:echo 4 -s [TgT«]12 Access Denied ,7 You don't have IRCop | halt
  1037. n440=482:*:echo 4 -s [TgT«]12 $parm2 7You are not a channel operator | halt
  1038. n441=404:*:echo 4 -s [TgT«]12 $parm2 7Cannot send to channel | halt
  1039. n442=251:*:echo 4 -s [TgT«]12 $parm2* | halt
  1040. n443=252:*:echo 4 -s [TgT«]12 $parm2* | halt
  1041. n444=253:*:echo 4 -s [TgT«]12 $parm2* | halt 
  1042. n445=254:*:echo 4 -s [TgT«]12 $parm2* | halt
  1043. n446=255:*:echo 4 -s [TgT«]12 $parm2* | halt 
  1044.